home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Catalog 1996 Spring / 1996 Electronics Boutique Spring CD-ROM (USA).bin / eb / demos / pitdemo.dir / 00015.ls < prev    next >
Encoding:
Text File  |  1995-12-13  |  771 b   |  37 lines
  1. global gNext
  2.  
  3. on mouseDown
  4.   puppetSound("StoryB")
  5.   puppetSprite(4, 1)
  6.   puppetSprite(11, 1)
  7.   set the castNum of sprite 4 to 26
  8.   set the castNum of sprite 11 to 27
  9.   updateStage()
  10.   startTimer()
  11.   repeat while the timer < 15
  12.     nothing()
  13.   end repeat
  14.   set the castNum of sprite 4 to 25
  15.   set the castNum of sprite 11 to 30
  16.   updateStage()
  17.   startTimer()
  18.   repeat while the timer < 15
  19.     nothing()
  20.   end repeat
  21.   set the castNum of sprite 4 to 26
  22.   set the castNum of sprite 11 to 27
  23.   updateStage()
  24.   startTimer()
  25.   repeat while the timer < 15
  26.     nothing()
  27.   end repeat
  28.   set the castNum of sprite 4 to 25
  29.   set the castNum of sprite 11 to 30
  30.   updateStage()
  31.   puppetSprite(4, 0)
  32.   puppetSprite(11, 0)
  33.   sound stop 2
  34.   set gNext to "enemies"
  35.   go("more next")
  36. end
  37.